-- background: 2579 from stack: in.0 -- bmap block id: 3242 -- flags: 4000 -- background id: 0 -- name: -- part 51 (field) -- low flags: 81 -- high flags: 0000 -- rect: left=24 top=295 right=312 bottom=124 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 3 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: map coords -- part 72 (field) -- low flags: 00 -- high flags: 0004 -- rect: left=8 top=71 right=91 bottom=136 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 3 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Search For -- part 77 (field) -- low flags: 00 -- high flags: 0002 -- rect: left=102 top=94 right=112 bottom=256 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 3 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Volume -- part 75 (field) -- low flags: 00 -- high flags: 0007 -- rect: left=255 top=131 right=196 bottom=327 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 3 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Size -- part 73 (field) -- low flags: 00 -- high flags: 0007 -- rect: left=8 top=131 right=196 bottom=184 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 3 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: File Name -- part 74 (field) -- low flags: 00 -- high flags: 0007 -- rect: left=186 top=131 right=196 bottom=253 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 3 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: File Type -- part 78 (field) -- low flags: 00 -- high flags: 0007 -- rect: left=329 top=131 right=196 bottom=501 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 3 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Key Words -- part 79 (field) -- low flags: 00 -- high flags: 4007 -- rect: left=8 top=214 right=317 bottom=501 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 3 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Description -- part 94 (button) -- low flags: 80 -- high flags: 8001 -- rect: left=9 top=47 right=317 bottom=500 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: You did not tell me what -- part 95 (button) -- low flags: 80 -- high flags: 8001 -- rect: left=203 top=186 right=204 bottom=299 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: to search for! -- part 103 (field) -- low flags: 81 -- high flags: 0001 -- rect: left=9 top=47 right=316 bottom=500 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Please Wait -- part 104 (field) -- low flags: 81 -- high flags: 0001 -- rect: left=9 top=47 right=316 bottom=500 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Search Empty -- part 105 (button) -- low flags: 00 -- high flags: A000 -- rect: left=136 top=47 right=91 bottom=175 -- title width / last selected line: 0 -- icon id / first selected line: 20186 / 20186 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Sort ----- HyperTalk script ----- on mouseUp answer "Sort all cards of this stack according to:" with "Cancel" or "Continue" or "File Name" if it is "File Name" then sort by first word of first line of field "File Name" else if it is "Continue" then answer "Sort all cards of this stack according to:" with "Cancel" or "Continue" or "Volume" if it is "Volume" then sort by first word of first line of field "Volume" else if it is "Continue" then answer "Sort all cards of this stack according to:" with "Cancel" or "File Type" if it is "File Type" then sort by first word of first line of field "File Type" else if it is "Cancel" then exit mouseUp else if it is "Cancel" then exit mouseUp else if it is "Cancel" then exit mouseUp end mouseUp -- part 106 (button) -- low flags: 00 -- high flags: A000 -- rect: left=175 top=48 right=91 bottom=222 -- title width / last selected line: 0 -- icon id / first selected line: 8538 / 8538 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: File Name ----- HyperTalk script ----- on mouseUp if background field "search for" is empty then push card go to card "search empty" wait three seconds pop card exit mouseUp end if put field "search for" into it doMenu next find it in field "file name" if it is not in field "file name" then doMenu prev answer "Not Found" else put it into field "search for" end if end mouseUp -- part 107 (button) -- low flags: 00 -- high flags: A000 -- rect: left=223 top=47 right=92 bottom=274 -- title width / last selected line: 0 -- icon id / first selected line: 8538 / 8538 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Key Words ----- HyperTalk script ----- on mouseUp if background field "search for" is empty then push card go to card "search empty" wait three seconds pop card exit mouseUp end if put field "search for" into it doMenu next find it in field "key words" if it is not in field "key words" then doMenu prev answer "Not Found" else put it into field "search for" end if end mouseUp -- part 110 (button) -- low flags: 00 -- high flags: A000 -- rect: left=369 top=45 right=93 bottom=414 -- title width / last selected line: 0 -- icon id / first selected line: 8538 / 8538 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: File Type ----- HyperTalk script ----- on mouseUp if background field "search for" is empty then push card go to card "search empty" wait three seconds pop card exit mouseUp end if put field "search for" into it doMenu next find it in field "file type" if it is not in field "file type" then doMenu prev answer "Not Found" else put it into field "search for" end if end mouseUp -- part 111 (button) -- low flags: 00 -- high flags: A000 -- rect: left=415 top=47 right=92 bottom=459 -- title width / last selected line: 0 -- icon id / first selected line: 1009 / 1009 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Read Disk ----- HyperTalk script ----- on mouseUp domenu "new card" put ReadCat(2,1,0,0,1,1,0,0,1) into new push card go to card "please wait" lock screen pop card select line 1 of field "volume" put the selection into volumeVar repeat with n = 1 to number of lines in field "file name" select line n of field "file name" put the selection into nameVar select line n of field "file type" put the selection into typeVar select line n of field "size" put the selection into sizeVar domenu "new card" put volumeVar into field "volume" put nameVar into field "file name" put typeVar into field "file type" put sizeVar into field "size" domenu prev end repeat domenu "delete card" unlock screen end mouseUp -- part 112 (button) -- low flags: 00 -- high flags: 0000 -- rect: left=214 top=320 right=340 bottom=240 -- title width / last selected line: 0 -- icon id / first selected line: 1014 / 1014 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Prev ----- HyperTalk script ----- on mouseUp put empty into background field "search for" go to prev card end mouseUp -- part 113 (button) -- low flags: 00 -- high flags: A003 -- rect: left=239 top=320 right=342 bottom=287 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Home ----- HyperTalk script ----- on mouseUp go to card id 5341 of stack "Home" end mouseUp -- part 114 (button) -- low flags: 00 -- high flags: 0000 -- rect: left=287 top=321 right=340 bottom=308 -- title width / last selected line: 0 -- icon id / first selected line: 1013 / 1013 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Next ----- HyperTalk script ----- on mouseUp put empty into background field "search for" go to next card end mouseUp -- part 115 (field) -- low flags: 81 -- high flags: 0001 -- rect: left=9 top=48 right=316 bottom=500 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Search Disk -- part 116 (button) -- low flags: 00 -- high flags: A000 -- rect: left=275 top=46 right=93 bottom=329 -- title width / last selected line: 0 -- icon id / first selected line: 8538 / 8538 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Description ----- HyperTalk script ----- on mouseUp if background field "search for" is empty then push card go to card "search empty" wait three seconds pop card exit mouseUp end if put field "search for" into it doMenu next find it in field "description" if it is not in field "description" then doMenu prev answer "Not Found" else put it into field "search for" end if end mouseUp -- part 117 (button) -- low flags: 00 -- high flags: A000 -- rect: left=329 top=46 right=92 bottom=368 -- title width / last selected line: 0 -- icon id / first selected line: 8538 / 8538 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Volume ----- HyperTalk script ----- on mouseUp if background field "search for" is empty then push card go to card "search empty" wait three seconds pop card exit mouseUp end if put field "search for" into it doMenu next find it in field "volume" if it is not in field "volume" then doMenu prev answer "Not Found" else put it into field "search for" end if end mouseUp -- part 119 (field) -- low flags: 00 -- high flags: 2007 -- rect: left=8 top=91 right=317 bottom=501 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 4 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: About